3.710 \(\int \frac {1}{2 (a+b)+x^4} \, dx\)

Optimal. Leaf size=79 \[ -\frac {\tan ^{-1}\left (\frac {x}{\sqrt [4]{2} \sqrt [4]{-a-b}}\right )}{2\ 2^{3/4} (-a-b)^{3/4}}-\frac {\tanh ^{-1}\left (\frac {x}{\sqrt [4]{2} \sqrt [4]{-a-b}}\right )}{2\ 2^{3/4} (-a-b)^{3/4}} \]

[Out]

-1/4*arctan(1/2*x*2^(3/4)/(-a-b)^(1/4))*2^(1/4)/(-a-b)^(3/4)-1/4*arctanh(1/2*x*2^(3/4)/(-a-b)^(1/4))*2^(1/4)/(
-a-b)^(3/4)

________________________________________________________________________________________

Rubi [A]  time = 0.03, antiderivative size = 79, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 3, integrand size = 11, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.273, Rules used = {212, 206, 203} \[ -\frac {\tan ^{-1}\left (\frac {x}{\sqrt [4]{2} \sqrt [4]{-a-b}}\right )}{2\ 2^{3/4} (-a-b)^{3/4}}-\frac {\tanh ^{-1}\left (\frac {x}{\sqrt [4]{2} \sqrt [4]{-a-b}}\right )}{2\ 2^{3/4} (-a-b)^{3/4}} \]

Antiderivative was successfully verified.

[In]

Int[(2*(a + b) + x^4)^(-1),x]

[Out]

-ArcTan[x/(2^(1/4)*(-a - b)^(1/4))]/(2*2^(3/4)*(-a - b)^(3/4)) - ArcTanh[x/(2^(1/4)*(-a - b)^(1/4))]/(2*2^(3/4
)*(-a - b)^(3/4))

Rule 203

Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(1*ArcTan[(Rt[b, 2]*x)/Rt[a, 2]])/(Rt[a, 2]*Rt[b, 2]), x] /;
FreeQ[{a, b}, x] && PosQ[a/b] && (GtQ[a, 0] || GtQ[b, 0])

Rule 206

Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(1*ArcTanh[(Rt[-b, 2]*x)/Rt[a, 2]])/(Rt[a, 2]*Rt[-b, 2]), x]
/; FreeQ[{a, b}, x] && NegQ[a/b] && (GtQ[a, 0] || LtQ[b, 0])

Rule 212

Int[((a_) + (b_.)*(x_)^4)^(-1), x_Symbol] :> With[{r = Numerator[Rt[-(a/b), 2]], s = Denominator[Rt[-(a/b), 2]
]}, Dist[r/(2*a), Int[1/(r - s*x^2), x], x] + Dist[r/(2*a), Int[1/(r + s*x^2), x], x]] /; FreeQ[{a, b}, x] &&
!GtQ[a/b, 0]

Rubi steps

\begin {align*} \int \frac {1}{2 (a+b)+x^4} \, dx &=-\frac {\int \frac {1}{\sqrt {2} \sqrt {-a-b}-x^2} \, dx}{2 \sqrt {2} \sqrt {-a-b}}-\frac {\int \frac {1}{\sqrt {2} \sqrt {-a-b}+x^2} \, dx}{2 \sqrt {2} \sqrt {-a-b}}\\ &=-\frac {\tan ^{-1}\left (\frac {x}{\sqrt [4]{2} \sqrt [4]{-a-b}}\right )}{2\ 2^{3/4} (-a-b)^{3/4}}-\frac {\tanh ^{-1}\left (\frac {x}{\sqrt [4]{2} \sqrt [4]{-a-b}}\right )}{2\ 2^{3/4} (-a-b)^{3/4}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.02, size = 128, normalized size = 1.62 \[ \frac {-\log \left (-2 \sqrt [4]{2} x \sqrt [4]{a+b}+2 \sqrt {a+b}+\sqrt {2} x^2\right )+\log \left (2 \sqrt [4]{2} x \sqrt [4]{a+b}+2 \sqrt {a+b}+\sqrt {2} x^2\right )-2 \tan ^{-1}\left (1-\frac {\sqrt [4]{2} x}{\sqrt [4]{a+b}}\right )+2 \tan ^{-1}\left (\frac {\sqrt [4]{2} x}{\sqrt [4]{a+b}}+1\right )}{8 \sqrt [4]{2} (a+b)^{3/4}} \]

Antiderivative was successfully verified.

[In]

Integrate[(2*(a + b) + x^4)^(-1),x]

[Out]

(-2*ArcTan[1 - (2^(1/4)*x)/(a + b)^(1/4)] + 2*ArcTan[1 + (2^(1/4)*x)/(a + b)^(1/4)] - Log[2*Sqrt[a + b] - 2*2^
(1/4)*(a + b)^(1/4)*x + Sqrt[2]*x^2] + Log[2*Sqrt[a + b] + 2*2^(1/4)*(a + b)^(1/4)*x + Sqrt[2]*x^2])/(8*2^(1/4
)*(a + b)^(3/4))

________________________________________________________________________________________

fricas [B]  time = 0.66, size = 294, normalized size = 3.72 \[ \left (\frac {1}{8}\right )^{\frac {1}{4}} \left (-\frac {1}{a^{3} + 3 \, a^{2} b + 3 \, a b^{2} + b^{3}}\right )^{\frac {1}{4}} \arctan \left (-4 \, \left (\frac {1}{8}\right )^{\frac {3}{4}} {\left (a^{2} + 2 \, a b + b^{2}\right )} x \left (-\frac {1}{a^{3} + 3 \, a^{2} b + 3 \, a b^{2} + b^{3}}\right )^{\frac {3}{4}} + 4 \, \left (\frac {1}{8}\right )^{\frac {3}{4}} {\left (a^{2} + 2 \, a b + b^{2}\right )} \sqrt {x^{2} + 2 \, \sqrt {\frac {1}{2}} {\left (a^{2} + 2 \, a b + b^{2}\right )} \sqrt {-\frac {1}{a^{3} + 3 \, a^{2} b + 3 \, a b^{2} + b^{3}}}} \left (-\frac {1}{a^{3} + 3 \, a^{2} b + 3 \, a b^{2} + b^{3}}\right )^{\frac {3}{4}}\right ) + \frac {1}{4} \, \left (\frac {1}{8}\right )^{\frac {1}{4}} \left (-\frac {1}{a^{3} + 3 \, a^{2} b + 3 \, a b^{2} + b^{3}}\right )^{\frac {1}{4}} \log \left (2 \, \left (\frac {1}{8}\right )^{\frac {1}{4}} {\left (a + b\right )} \left (-\frac {1}{a^{3} + 3 \, a^{2} b + 3 \, a b^{2} + b^{3}}\right )^{\frac {1}{4}} + x\right ) - \frac {1}{4} \, \left (\frac {1}{8}\right )^{\frac {1}{4}} \left (-\frac {1}{a^{3} + 3 \, a^{2} b + 3 \, a b^{2} + b^{3}}\right )^{\frac {1}{4}} \log \left (-2 \, \left (\frac {1}{8}\right )^{\frac {1}{4}} {\left (a + b\right )} \left (-\frac {1}{a^{3} + 3 \, a^{2} b + 3 \, a b^{2} + b^{3}}\right )^{\frac {1}{4}} + x\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(x^4+2*a+2*b),x, algorithm="fricas")

[Out]

(1/8)^(1/4)*(-1/(a^3 + 3*a^2*b + 3*a*b^2 + b^3))^(1/4)*arctan(-4*(1/8)^(3/4)*(a^2 + 2*a*b + b^2)*x*(-1/(a^3 +
3*a^2*b + 3*a*b^2 + b^3))^(3/4) + 4*(1/8)^(3/4)*(a^2 + 2*a*b + b^2)*sqrt(x^2 + 2*sqrt(1/2)*(a^2 + 2*a*b + b^2)
*sqrt(-1/(a^3 + 3*a^2*b + 3*a*b^2 + b^3)))*(-1/(a^3 + 3*a^2*b + 3*a*b^2 + b^3))^(3/4)) + 1/4*(1/8)^(1/4)*(-1/(
a^3 + 3*a^2*b + 3*a*b^2 + b^3))^(1/4)*log(2*(1/8)^(1/4)*(a + b)*(-1/(a^3 + 3*a^2*b + 3*a*b^2 + b^3))^(1/4) + x
) - 1/4*(1/8)^(1/4)*(-1/(a^3 + 3*a^2*b + 3*a*b^2 + b^3))^(1/4)*log(-2*(1/8)^(1/4)*(a + b)*(-1/(a^3 + 3*a^2*b +
3*a*b^2 + b^3))^(1/4) + x)

________________________________________________________________________________________

giac [B]  time = 0.21, size = 219, normalized size = 2.77 \[ \frac {{\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}} \arctan \left (\frac {\sqrt {2} {\left (2 \, x + \sqrt {2} {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}}\right )}}{2 \, {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}}}\right )}{4 \, {\left (\sqrt {2} a + \sqrt {2} b\right )}} + \frac {{\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}} \arctan \left (\frac {\sqrt {2} {\left (2 \, x - \sqrt {2} {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}}\right )}}{2 \, {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}}}\right )}{4 \, {\left (\sqrt {2} a + \sqrt {2} b\right )}} + \frac {{\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}} \log \left (x^{2} + \sqrt {2} {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}} x + \sqrt {2 \, a + 2 \, b}\right )}{8 \, {\left (\sqrt {2} a + \sqrt {2} b\right )}} - \frac {{\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}} \log \left (x^{2} - \sqrt {2} {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}} x + \sqrt {2 \, a + 2 \, b}\right )}{8 \, {\left (\sqrt {2} a + \sqrt {2} b\right )}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(x^4+2*a+2*b),x, algorithm="giac")

[Out]

1/4*(2*a + 2*b)^(1/4)*arctan(1/2*sqrt(2)*(2*x + sqrt(2)*(2*a + 2*b)^(1/4))/(2*a + 2*b)^(1/4))/(sqrt(2)*a + sqr
t(2)*b) + 1/4*(2*a + 2*b)^(1/4)*arctan(1/2*sqrt(2)*(2*x - sqrt(2)*(2*a + 2*b)^(1/4))/(2*a + 2*b)^(1/4))/(sqrt(
2)*a + sqrt(2)*b) + 1/8*(2*a + 2*b)^(1/4)*log(x^2 + sqrt(2)*(2*a + 2*b)^(1/4)*x + sqrt(2*a + 2*b))/(sqrt(2)*a
+ sqrt(2)*b) - 1/8*(2*a + 2*b)^(1/4)*log(x^2 - sqrt(2)*(2*a + 2*b)^(1/4)*x + sqrt(2*a + 2*b))/(sqrt(2)*a + sqr
t(2)*b)

________________________________________________________________________________________

maple [B]  time = 0.00, size = 137, normalized size = 1.73 \[ \frac {\sqrt {2}\, \arctan \left (\frac {\sqrt {2}\, x}{\left (2 a +2 b \right )^{\frac {1}{4}}}-1\right )}{4 \left (2 a +2 b \right )^{\frac {3}{4}}}+\frac {\sqrt {2}\, \arctan \left (\frac {\sqrt {2}\, x}{\left (2 a +2 b \right )^{\frac {1}{4}}}+1\right )}{4 \left (2 a +2 b \right )^{\frac {3}{4}}}+\frac {\sqrt {2}\, \ln \left (\frac {x^{2}+\left (2 a +2 b \right )^{\frac {1}{4}} \sqrt {2}\, x +\sqrt {2 a +2 b}}{x^{2}-\left (2 a +2 b \right )^{\frac {1}{4}} \sqrt {2}\, x +\sqrt {2 a +2 b}}\right )}{8 \left (2 a +2 b \right )^{\frac {3}{4}}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(1/(x^4+2*a+2*b),x)

[Out]

1/4/(2*a+2*b)^(3/4)*2^(1/2)*arctan(2^(1/2)/(2*a+2*b)^(1/4)*x-1)+1/4/(2*a+2*b)^(3/4)*2^(1/2)*arctan(2^(1/2)/(2*
a+2*b)^(1/4)*x+1)+1/8/(2*a+2*b)^(3/4)*2^(1/2)*ln((x^2+(2*a+2*b)^(1/4)*2^(1/2)*x+(2*a+2*b)^(1/2))/(x^2-(2*a+2*b
)^(1/4)*2^(1/2)*x+(2*a+2*b)^(1/2)))

________________________________________________________________________________________

maxima [B]  time = 3.02, size = 179, normalized size = 2.27 \[ \frac {\sqrt {2} \arctan \left (\frac {\sqrt {2} {\left (2 \, x + \sqrt {2} {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}}\right )}}{2 \, {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}}}\right )}{4 \, {\left (2 \, a + 2 \, b\right )}^{\frac {3}{4}}} + \frac {\sqrt {2} \arctan \left (\frac {\sqrt {2} {\left (2 \, x - \sqrt {2} {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}}\right )}}{2 \, {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}}}\right )}{4 \, {\left (2 \, a + 2 \, b\right )}^{\frac {3}{4}}} + \frac {\sqrt {2} \log \left (x^{2} + \sqrt {2} {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}} x + \sqrt {2 \, a + 2 \, b}\right )}{8 \, {\left (2 \, a + 2 \, b\right )}^{\frac {3}{4}}} - \frac {\sqrt {2} \log \left (x^{2} - \sqrt {2} {\left (2 \, a + 2 \, b\right )}^{\frac {1}{4}} x + \sqrt {2 \, a + 2 \, b}\right )}{8 \, {\left (2 \, a + 2 \, b\right )}^{\frac {3}{4}}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(x^4+2*a+2*b),x, algorithm="maxima")

[Out]

1/4*sqrt(2)*arctan(1/2*sqrt(2)*(2*x + sqrt(2)*(2*a + 2*b)^(1/4))/(2*a + 2*b)^(1/4))/(2*a + 2*b)^(3/4) + 1/4*sq
rt(2)*arctan(1/2*sqrt(2)*(2*x - sqrt(2)*(2*a + 2*b)^(1/4))/(2*a + 2*b)^(1/4))/(2*a + 2*b)^(3/4) + 1/8*sqrt(2)*
log(x^2 + sqrt(2)*(2*a + 2*b)^(1/4)*x + sqrt(2*a + 2*b))/(2*a + 2*b)^(3/4) - 1/8*sqrt(2)*log(x^2 - sqrt(2)*(2*
a + 2*b)^(1/4)*x + sqrt(2*a + 2*b))/(2*a + 2*b)^(3/4)

________________________________________________________________________________________

mupad [B]  time = 0.00, size = 121, normalized size = 1.53 \[ \frac {2^{1/4}\,\mathrm {atan}\left (\frac {2^{1/4}\,x}{\left (\frac {\sqrt {2}\,a}{{\left (-a-b\right )}^{3/2}}+\frac {\sqrt {2}\,b}{{\left (-a-b\right )}^{3/2}}\right )\,{\left (-a-b\right )}^{3/4}}\right )}{4\,{\left (-a-b\right )}^{3/4}}+\frac {2^{1/4}\,\mathrm {atanh}\left (\frac {2^{1/4}\,x}{\left (\frac {\sqrt {2}\,a}{{\left (-a-b\right )}^{3/2}}+\frac {\sqrt {2}\,b}{{\left (-a-b\right )}^{3/2}}\right )\,{\left (-a-b\right )}^{3/4}}\right )}{4\,{\left (-a-b\right )}^{3/4}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(1/(2*a + 2*b + x^4),x)

[Out]

(2^(1/4)*atan((2^(1/4)*x)/(((2^(1/2)*a)/(- a - b)^(3/2) + (2^(1/2)*b)/(- a - b)^(3/2))*(- a - b)^(3/4))))/(4*(
- a - b)^(3/4)) + (2^(1/4)*atanh((2^(1/4)*x)/(((2^(1/2)*a)/(- a - b)^(3/2) + (2^(1/2)*b)/(- a - b)^(3/2))*(- a
- b)^(3/4))))/(4*(- a - b)^(3/4))

________________________________________________________________________________________

sympy [A]  time = 0.55, size = 42, normalized size = 0.53 \[ \operatorname {RootSum} {\left (t^{4} \left (2048 a^{3} + 6144 a^{2} b + 6144 a b^{2} + 2048 b^{3}\right ) + 1, \left (t \mapsto t \log {\left (8 t a + 8 t b + x \right )} \right )\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(x**4+2*a+2*b),x)

[Out]

RootSum(_t**4*(2048*a**3 + 6144*a**2*b + 6144*a*b**2 + 2048*b**3) + 1, Lambda(_t, _t*log(8*_t*a + 8*_t*b + x))
)

________________________________________________________________________________________